
> ############################################################################
> # Replication file for:                                                    #
> # "When Do Different Systems of Government Lead to Similar Power-Sharing?  # 
> #  The Case of Government Formation"                                       #
> # Author: Thiago N. Silva                                                  #
> ############################################################################
> 
> # Start time tracker
> start.time <- Sys.time()

> ### Installing packages 
> #install.packages(c("broom.mixed", "car", "dplyr", "MASS", ggeffects", "ggplot2","ggstance", 
> #                   "ggthemes", "gridExtra", "jtools", "miceadds", "sjPlot","stargazer"))
> 
> ### Loading packages
> library(broom.mixed)

> library(car)

> library(dplyr)

> library(MASS)

> library(ggeffects)

> library(ggplot2)

> library(ggstance)

> library(ggthemes)

> library(gridExtra)

> library(jtools)

> library(miceadds)

> library(sjPlot)

> library(stargazer)

> ### Data
> ## Portfolio Allocation in Parliamentary Democracies 
> ## (Data from Warwick and Druckman 2006)
> load(file="~/Downloads/PSRM Dataverse/parl_port_Warwick_Druckman_2006.Rdata")

> ## Portfolio Allocation in Presidential Democracies 
> ## (Data from Silva 2022)
> load(file="~/Downloads/PSRM Dataverse/pres_port_Silva_2022.Rdata")

> ### Figure 1: Proportionality in Portfolio Allocation 
> ### in Parliamentary and Presidential Systems
> 
> ## Figure 1a. Parliamentary Systems 
> gamson_parl <- lm(Portfolio_Share ~ Seat_Share_Contribution, data = cabparl_final)

> figure_1a <- ggplot(cabparl_final, aes(x = Seat_Share_Contribution, y = Portfolio_Share)) + 
+   geom_point(aes(shape="Other Governing Parties")) +
+   geom_point(data=cabparl_final[cabparl_final$Formateur==1,], aes(shape="Formateur's Party"), color="black") +
+   geom_smooth(aes(x= Seat_Share_Contribution, y = Seat_Share_Contribution, linetype="Gamson's Law"), 
+               col = "black", method = "lm", formula = y ~ x, se = FALSE) +
+   scale_shape_manual(values = c(16, 1), name="") +
+   theme_few() +
+   scale_linetype_manual(values = "twodash") +
+   theme(plot.title = element_text(hjust = 0.5),
+         legend.text=element_text(size=9)) +
+   labs(x = "Government Seat Share Contribution (%)", 
+        y = "Portfolio Share (%)")  + 
+   theme(legend.position="bottom", legend.direction="vertical", 
+         legend.title=element_blank())

> ## Figure 1b. Presidential Systems 
> gamson_pres <- lm(Portfolio_Share ~ Seat_Share_Contribution, data = pres_port_master)

> figure_1b <- ggplot(pres_port_master, aes(x = Seat_Share_Contribution, y = Portfolio_Share)) + 
+   geom_point(aes(shape="Other Governing Parties")) +
+   geom_point(data=pres_port_master[pres_port_master$Formateur==1,], aes(shape="Formateur's Party"), color="black") +
+   geom_smooth(aes(x= Seat_Share_Contribution, y = Seat_Share_Contribution, linetype="Gamson's Law"), 
+               col = "black", method = "lm", formula = y ~ x, se = FALSE) +
+   scale_shape_manual(values = c(16, 1), name="") +
+   theme_few() +
+   scale_linetype_manual(values = "twodash") +
+   theme(plot.title = element_text(hjust = 0.5),
+         legend.text=element_text(size=9)) +
+   labs(x = "Government Seat Share Contribution (%)", 
+        y = "Portfolio Share (%)")  + 
+   theme(legend.position="bottom", legend.direction="vertical", 
+         legend.title=element_blank())

> ## Combining Figure 1a and Figure 1b in the same Figure 1 and exporting as .pdf)
> pdf("~/Downloads/PSRM Dataverse/Figure_1.pdf",
+     width=10,height=6) 

> grid.arrange(figure_1a, figure_1b, ncol=2)

> dev.off()
null device 
          1 

> ### Figure 2: The Effect of Presidential Powers on the Formateur’s Portfolio Share
> main_int_model <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                        President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), 
+                      data=pres_port_master)

> ## Figure 2a. Estimates and Confidence Intervals
> figure_2a <- plot_model(main_int_model, rm.terms = c("as.factor(Year)1947", 
+                                                      "as.factor(Year)1950", "as.factor(Year)1951",
+                                                      "as.factor(Year)1952", "as.factor(Year)1953", 
+                                                      "as.factor(Year)1954", "as.factor(Year)1955", 
+                                                      "as.factor(Year)1956", "as.factor(Year)1957", 
+                                                      "as.factor(Year)1958", "as.factor(Year)1960", 
+                                                      "as.factor(Year)1961", "as.factor(Year)1962", 
+                                                      "as.factor(Year)1963", "as.factor(Year)1965", 
+                                                      "as.factor(Year)1966", "as.factor(Year)1967", 
+                                                      "as.factor(Year)1978", "as.factor(Year)1980", 
+                                                      "as.factor(Year)1981", "as.factor(Year)1982", 
+                                                      "as.factor(Year)1983", "as.factor(Year)1984", 
+                                                      "as.factor(Year)1985", "as.factor(Year)1986", 
+                                                      "as.factor(Year)1987", "as.factor(Year)1988", 
+                                                      "as.factor(Year)1989", "as.factor(Year)1990", 
+                                                      "as.factor(Year)1991", "as.factor(Year)1992", 
+                                                      "as.factor(Year)1993", "as.factor(Year)1994", 
+                                                      "as.factor(Year)1995", "as.factor(Year)1996", 
+                                                      "as.factor(Year)1997", "as.factor(Year)1998", 
+                                                      "as.factor(Year)1999", "as.factor(Year)2000", 
+                                                      "as.factor(Year)2001", "as.factor(Year)2002", 
+                                                      "as.factor(Year)2003", "as.factor(Year)2004", 
+                                                      "as.factor(Year)2005", "as.factor(Year)2006", 
+                                                      "as.factor(Year)2007", "as.factor(Year)2008", 
+                                                      "as.factor(Year)2009", "as.factor(Year)2010",
+                                                      "as.factor(Year)2011", "as.factor(Year)2012", 
+                                                      "as.factor(Year)2013", "as.factor(Year)2014", 
+                                                      "as.factor(Year)2015", "as.factor(Year)2016", 
+                                                      "as.factor(Year)2017", "as.factor(Year)2018", 
+                                                      "as.factor(Year)2019", "as.factor(Country)Bolivia", 
+                                                      "as.factor(Country)Brazil",  "as.factor(Country)Burundi", 
+                                                      "as.factor(Country)Chile", "as.factor(Country)Colombia", 
+                                                      "as.factor(Country)Ecuador", "as.factor(Country)El Salvador", 
+                                                      "as.factor(Country)Ghana",  "as.factor(Country)Honduras", 
+                                                      "as.factor(Country)Indonesia",  "as.factor(Country)Kenya", 
+                                                      "as.factor(Country)Malawi",  "as.factor(Country)Panama", 
+                                                      "as.factor(Country)Paraguay",  "as.factor(Country)Peru", 
+                                                      "as.factor(Country)Philippines",  "as.factor(Country)Sierra Leone", 
+                                                      "as.factor(Country)Uruguay",  "as.factor(Country)Venezuela"),
+                         axis.labels = c("(Intercept)", "President_Majority",  
+                                         "Electoral_Year", "Formateur x Presidential Power",
+                                         "Presidential Power", "Formateur",
+                                         "Seat Share Contribution"), 
+                         colors = "bw", show.values = TRUE, show.intercept = TRUE,
+                         show.p = FALSE, order.terms = c(2, 3, 4, 7, 5, 6, 1)) +
+   geom_hline(yintercept=0, lty=2, lwd=0.6, colour="black") +
+   theme_bw() +
+   ylab("Estimates") +   
+   theme(axis.title.x = element_text(size = 12),
+         axis.text.x = element_text(size = 12),
+         axis.text.y = element_text(size = 11, face="bold")) + 
+   theme(plot.title = element_blank())

> ## Figure 2b. Marginal Effects
> source("~/Downloads/PSRM Dataverse/ggintfun.R")

> figure_2b <- ggintfun(main_int_model, varnames = c("Formateur", "Presidential_Power"),
+                       varlabs = c("Formateur on Portfolio Share", "Presidential Power" ), 
+                       title = FALSE, rug = T, jitter_factor = 10,
+                       twoways = F) +   
+   theme(axis.title.x = element_text(size = 18),
+         axis.text.x = element_text(size = 18),
+         axis.title.y = element_text(size = 18),
+         axis.text.y = element_text(size = 18)) + 
+   theme(plot.title = element_blank())

> ## Combining Figure 2a and Figure 2b in the same Figure 2 
> ## and exporting as .pdf)
> pdf("~/Downloads/PSRM Dataverse/Figure_2.pdf",
+     width=12,height=6) 

> grid.arrange(figure_2a, figure_2b, ncol=2)

> dev.off()
null device 
          1 

> #### Supplementary Material 
> 
> ## Table A.1: Testing Gamson’s Law and the Formateur’s Advantage
> 
> # Model 1 of Table A.1: Gamson's Law Test in Parliamentary Systems
> gamson_parl <- lm(Portfolio_Share ~ Seat_Share_Contribution, data = cabparl_final)

> # Model 2 of Table A.1: Gamson's Law Test in Presidential Systems
> gamson_pres <- lm(Portfolio_Share ~ Seat_Share_Contribution, data = pres_port_master)

> # Model 3 of Table A.1: Formateur Advantage Test in Parliamentary Systems
> Formateur_parl <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur, data = cabparl_final)

> # Model 4 of Table A.1: Formateur Advantage Test in Parliamentary Systems
> Formateur_pres <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur,
+                      data = pres_port_master)

> # Combining all models in Table A.1.
> stargazer(gamson_parl, gamson_pres, Formateur_parl, Formateur_pres,
+           type="text", out="~/Downloads/PSRM Dataverse/TableA1.txt")

===============================================================================================================================
                                                                  Dependent variable:                                          
                        -------------------------------------------------------------------------------------------------------
                                                                    Portfolio_Share                                            
                                   (1)                       (2)                       (3)                       (4)           
-------------------------------------------------------------------------------------------------------------------------------
Seat_Share_Contribution          0.843***                  0.661***                  0.814***                  0.446***        
                                 (0.009)                   (0.024)                   (0.013)                   (0.027)         
                                                                                                                               
Formateur                                                                            0.022***                  0.182***        
                                                                                     (0.007)                   (0.014)         
                                                                                                                               
Constant                         0.052***                  0.025**                   0.055***                  0.041***        
                                 (0.004)                   (0.010)                   (0.004)                   (0.009)         
                                                                                                                               
-------------------------------------------------------------------------------------------------------------------------------
Observations                       807                       656                       807                       656           
R2                                0.911                     0.532                     0.912                     0.631          
Adjusted R2                       0.911                     0.531                     0.912                     0.630          
Residual Std. Error          0.065 (df = 805)          0.146 (df = 654)          0.064 (df = 804)          0.130 (df = 653)    
F Statistic             8,270.557*** (df = 1; 805) 743.532*** (df = 1; 654) 4,184.915*** (df = 2; 804) 557.880*** (df = 2; 653)
===============================================================================================================================
Note:                                                                                               *p<0.1; **p<0.05; ***p<0.01

> ### Table B.1: List of Countries and Years Covered
> ## Table B.1 generated with the information extracted from the code below:
> with(subset(pres_port_master), split(Year, Country))
$Argentina
[1] 2000 2000 2001 2001 2002 2002

$Bolivia
 [1] 1985 1985 1989 1989 1991 1991 1992 1992 1993 1993 1993 1994
[13] 1994 1994 1997 1997 1997 1997 1999 1999 1999 2001 2001 2001
[25] 2002 2002 2002 2002

$Brazil
  [1] 1946 1946 1947 1947 1950 1950 1951 1951 1951 1952 1952 1953
 [13] 1953 1953 1954 1954 1954 1954 1955 1955 1955 1955 1956 1956
 [25] 1956 1956 1957 1957 1957 1958 1958 1958 1958 1960 1960 1960
 [37] 1960 1961 1961 1961 1961 1962 1962 1962 1962 1986 1986 1988
 [49] 1988 1988 1989 1989 1990 1990 1992 1992 1992 1992 1992 1992
 [61] 1993 1993 1993 1993 1993 1994 1994 1994 1994 1994 1995 1995
 [73] 1995 1995 1995 1996 1996 1996 1996 1996 1998 1998 1998 1998
 [85] 1999 1999 1999 1999 2000 2000 2000 2000 2001 2001 2001 2001
 [97] 2002 2002 2002 2002 2003 2003 2003 2003 2004 2004 2004 2004
[109] 2004 2004 2004 2005 2005 2005 2005 2005 2005 2006 2006 2006
[121] 2006 2006 2006 2007 2007 2007 2007 2007 2007 2007 2010 2010
[133] 2010 2010 2010 2010 2010 2011 2011 2011 2011 2011 2011 2011
[145] 2012 2012 2012 2012 2012 2012 2012 2013 2013 2013 2013 2013
[157] 2013 2013 2015 2015 2015 2015 2015 2015 2015 2016 2016 2016
[169] 2016 2016 2016 2016 2016 2017 2017 2017 2017 2017 2017 2017
[181] 2017 2019 2019 2019 2019

$Burundi
 [1] 2005 2005 2005 2005 2007 2007 2007 2010 2010 2010

$Chile
 [1] 1990 1990 1990 1992 1992 1992 1994 1994 1994 1995 1995 1995
[13] 1996 1996 1996 1996 1998 1998 1998 1999 1999 1999 2000 2000
[25] 2000 2001 2001 2001 2001 2003 2003 2003 2003 2004 2004 2004
[37] 2004 2005 2005 2005 2005 2006 2006 2006 2006 2007 2007 2007
[49] 2007 2008 2008 2008 2008 2010 2010 2011 2011 2012 2012 2013
[61] 2013 2014 2014 2014 2014 2015 2015 2015 2015 2015 2015 2018
[73] 2018 2018

$Colombia
 [1] 1978 1978 1980 1980 1982 1982 1983 1983 1984 1984 1985 1985
[13] 1990 1990 1991 1991 1991 1992 1992 1992 1993 1993 1994 1994
[25] 1996 1996 1997 1997 1998 1998 1999 1999 2000 2000 2001 2001
[37] 2002 2002 2003 2003 2005 2005 2006 2006 2007 2007 2007 2010
[49] 2010 2010 2010 2011 2011 2011 2011 2012 2012 2012 2012 2013
[61] 2013 2013 2013 2014 2014 2014 2014 2015 2015 2015 2015 2016
[73] 2016 2016 2016 2017 2017 2017 2017 2018 2018

$Ecuador
 [1] 1984 1984 1984 1986 1986 1986 1987 1987 1987 1988 1988 1992
[13] 1992 1993 1993 1994 1994 1996 1996 1997 1997 2002 2002 2002
[25] 2004 2004 2004

$`El Salvador`
 [1] 2000 2000 2003 2003 2009 2009 2012 2012 2014 2014

$Ghana
[1] 2001 2001

$Honduras
 [1] 1982 1982 1984 1984 1985 1985 1990 1990 1990 1993 1993 1994
[13] 1994 2000 2000 2002 2002 2009 2009 2009 2010 2010 2010 2010

$Indonesia
 [1] 2005 2005 2005 2005 2005 2006 2006 2006 2006 2006 2006 2007
[13] 2007 2007 2007 2007 2007 2009 2009 2009 2009 2009 2009 2011
[25] 2011 2011 2011 2011 2011 2012 2012 2012 2012 2012 2012 2013
[37] 2013 2013 2013 2013 2013

$Kenya
 [1] 2003 2003 2003 2003 2004 2004 2008 2008 2009 2009 2014 2014
[13] 2014 2014 2014

$Malawi
 [1] 1994 1994 2004 2004 2004 2005 2005 2007 2007 2009 2009 2011
[13] 2011 2014 2014

$Panama
 [1] 1995 1995 1998 1998 1999 1999 1999 2009 2009 2012 2012 2013
[13] 2013 2014 2014

$Paraguay
 [1] 1999 1999 1999 2000 2000 2001 2001 2003 2003 2008 2008 2008
[13] 2009 2009 2009 2009 2011 2011 2011 2012 2012

$Peru
 [1] 1980 1980 1981 1981 1982 1982 1983 1983 1990 1990 1990 2001
[13] 2001 2002 2002 2003 2003 2004 2005 2006 2006 2008 2008 2009
[25] 2009 2010 2010

$Philippines
 [1] 2007 2007 2007 2008 2008 2008 2009 2009 2009 2010 2010

$`Sierra Leone`
[1] 2008 2008 2009 2009 2010 2010

$Uruguay
 [1] 1985 1985 1986 1986 1986 1988 1988 1989 1989 1990 1990 1991
[13] 1991 1992 1992 1994 1995 1995 1996 1996 1999 1999 2000 2000
[25] 2001 2001 2003 2003 2004 2004

$Venezuela
 [1] 1961 1961 1962 1962 1963 1963 1965 1965 1966 1966 1967 1967
[13] 1992 1992 1994 1994 1995 1995 1996 1996 1997 1997 1999 1999
[25] 2001 2001 2002 2002


> ###Table C.1: Descriptive Statistics and Variables
> stargazer(pres_port_master[c("Portfolio_Share", "Presidential_Power", "Formateur", 
+                              "Seat_Share_Contribution", "Electoral_Year", "President_Majority")], 
+           type = "text", digits=2, 
+           summary.stat = c("mean", "sd", "min", "max", "n"),
+           out="~/Downloads/PSRM Dataverse/TableC1.txt")

====================================================
Statistic               Mean St. Dev.  Min  Max   N 
----------------------------------------------------
Portfolio_Share         0.25   0.21   0.03  0.95 656
Presidential_Power      0.41   0.14   0.03  0.62 656
Formateur               0.31   0.46     0    1   656
Seat_Share_Contribution 0.33   0.24   0.004 0.99 656
Electoral_Year          0.40   0.49     0    1   656
President_Majority      0.14   0.35     0    1   656
----------------------------------------------------

> ### Figure D.1: Distribution of Presidential Power Across Presidential Democracies
> ### (Average Values)
> pdf("~/Downloads/PSRM Dataverse/Figure_D1.pdf",
+     width=8,height=6) 

> pres_port_master %>%
+   distinct(Country, .keep_all = TRUE) %>% 
+   ggplot(aes(x = reorder(factor(Country), Avg_Pres_Power_Country), y = Avg_Pres_Power_Country)) +
+   geom_bar(stat="identity", alpha=.9, width=.8) +
+   geom_hline(yintercept=0.41, linetype="dashed", color = "blue") +
+   geom_text(aes(label=round(Avg_Pres_Power_Country,2)), 
+             position=position_dodge(width=0.9), hjust=-0.18, size = 2.6) +  
+   coord_flip() +
+   xlab("Countries") +
+   ylab("Mean Value of Presidential Powers") + ylim(0,0.62) +
+   theme_bw()

> dev.off()
null device 
          1 

> ### Table E.1: The Effect of Presidential Power on the Formateur’s Portfolio Share
> 
> ## Model 1 of Table E.1. Benchmark model
> bench <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power +
+               Formateur*Presidential_Power, data=pres_port_master)

> ## Model 2 of Table E.1. With Controls
> controls <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                  President_Majority  + Formateur*Presidential_Power, 
+                data=pres_port_master)

> ## Model 3 of Table E.1. With Country and Year Fixed-Effects
> main_int_model <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                        President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), 
+                      data=pres_port_master)

> ## Model 4 of Table E.1. With Country, Year, and Government Fixed-Effects
> model4_FE <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + 
+                   Electoral_Year + President_Majority  + Formateur*Presidential_Power + 
+                   as.factor(Country) + as.factor(Year) + as.factor(Coalition_ID), 
+                 data=pres_port_master)

> ## Combining Models 1-4 in Table E.1
> stargazer(bench, controls, main_int_model, model4_FE,
+           type="text", out="~/Downloads/PSRM Dataverse/TableE1.txt")

==================================================================================================================================
                                                                       Dependent variable:                                        
                               ---------------------------------------------------------------------------------------------------
                                                                         Portfolio_Share                                          
                                         (1)                      (2)                      (3)                      (4)           
----------------------------------------------------------------------------------------------------------------------------------
Seat_Share_Contribution                0.452***                 0.443***                 0.409***                 0.423***        
                                       (0.027)                  (0.027)                  (0.029)                  (0.030)         
                                                                                                                                  
Formateur                              0.098***                 0.095**                  0.089**                  0.073**         
                                       (0.037)                  (0.037)                  (0.037)                  (0.036)         
                                                                                                                                  
Presidential_Power                      0.055                    0.055                    0.077                    -0.283         
                                       (0.042)                  (0.042)                  (0.195)                  (0.849)         
                                                                                                                                  
Electoral_Year                                                   0.004                   -0.0003                   -0.023         
                                                                (0.010)                  (0.012)                  (0.019)         
                                                                                                                                  
President_Majority                                              0.033**                   -0.002                   -0.066         
                                                                (0.015)                  (0.023)                  (0.070)         
                                                                                                                                  
as.factor(Country)Bolivia                                                                 -0.014                   -0.001         
                                                                                         (0.060)                  (0.145)         
                                                                                                                                  
as.factor(Country)Brazil                                                                  -0.065                   -0.031         
                                                                                         (0.057)                  (0.147)         
                                                                                                                                  
as.factor(Country)Burundi                                                                 0.008                    0.147          
                                                                                         (0.079)                  (0.191)         
                                                                                                                                  
as.factor(Country)Chile                                                                   -0.061                   0.244          
                                                                                         (0.065)                  (0.213)         
                                                                                                                                  
as.factor(Country)Colombia                                                                -0.021                   -0.025         
                                                                                         (0.055)                  (0.122)         
                                                                                                                                  
as.factor(Country)Ecuador                                                               -0.196***                  -0.201         
                                                                                         (0.060)                  (0.180)         
                                                                                                                                  
as.factor(Country)El Salvador                                                             0.067                    0.072          
                                                                                         (0.067)                  (0.133)         
                                                                                                                                  
as.factor(Country)Ghana                                                                   0.067                    0.094          
                                                                                         (0.103)                  (0.131)         
                                                                                                                                  
as.factor(Country)Honduras                                                                0.017                    0.091          
                                                                                         (0.062)                  (0.164)         
                                                                                                                                  
as.factor(Country)Indonesia                                                               -0.071                   -0.182         
                                                                                         (0.091)                  (0.342)         
                                                                                                                                  
as.factor(Country)Kenya                                                                   -0.027                   0.003          
                                                                                         (0.077)                  (0.225)         
                                                                                                                                  
as.factor(Country)Malawi                                                                  -0.092                   -0.110         
                                                                                         (0.074)                  (0.208)         
                                                                                                                                  
as.factor(Country)Panama                                                                  -0.026                   0.028          
                                                                                         (0.064)                  (0.158)         
                                                                                                                                  
as.factor(Country)Paraguay                                                                -0.022                   -0.066         
                                                                                         (0.065)                  (0.186)         
                                                                                                                                  
as.factor(Country)Peru                                                                   -0.128**                  -0.132         
                                                                                         (0.059)                  (0.116)         
                                                                                                                                  
as.factor(Country)Philippines                                                            -0.151**                  -0.225         
                                                                                         (0.070)                  (0.185)         
                                                                                                                                  
as.factor(Country)Sierra Leone                                                            -0.071                   0.041          
                                                                                         (0.085)                  (0.184)         
                                                                                                                                  
as.factor(Country)Uruguay                                                                 0.028                    0.018          
                                                                                         (0.058)                  (0.101)         
                                                                                                                                  
as.factor(Country)Venezuela                                                               -0.084                   -0.010         
                                                                                         (0.062)                  (0.119)         
                                                                                                                                  
as.factor(Year)1947                                                                       -0.000                   -0.000         
                                                                                         (0.123)                  (0.120)         
                                                                                                                                  
as.factor(Year)1950                                                                       -0.072                   -0.094         
                                                                                         (0.123)                  (0.122)         
                                                                                                                                  
as.factor(Year)1951                                                                       0.075                    0.013          
                                                                                         (0.114)                  (0.130)         
                                                                                                                                  
as.factor(Year)1952                                                                       -0.003                   -0.089         
                                                                                         (0.126)                  (0.142)         
                                                                                                                                  
as.factor(Year)1953                                                                       -0.009                   -0.094         
                                                                                         (0.115)                  (0.133)         
                                                                                                                                  
as.factor(Year)1954                                                                       0.020                    -0.066         
                                                                                         (0.110)                  (0.140)         
                                                                                                                                  
as.factor(Year)1955                                                                       0.002                    -0.107         
                                                                                         (0.111)                  (0.142)         
                                                                                                                                  
as.factor(Year)1956                                                                       0.020                    -0.066         
                                                                                         (0.110)                  (0.140)         
                                                                                                                                  
as.factor(Year)1957                                                                       0.103                    -0.007         
                                                                                         (0.116)                  (0.147)         
                                                                                                                                  
as.factor(Year)1958                                                                       0.051                    -0.152         
                                                                                         (0.110)                  (0.186)         
                                                                                                                                  
as.factor(Year)1960                                                                       0.023                    -0.203         
                                                                                         (0.111)                  (0.187)         
                                                                                                                                  
as.factor(Year)1961                                                                       -0.001                   -0.180         
                                                                                         (0.103)                  (0.165)         
                                                                                                                                  
as.factor(Year)1962                                                                       -0.022                   -0.096         
                                                                                         (0.103)                  (0.165)         
                                                                                                                                  
as.factor(Year)1963                                                                       -0.009                   -0.138         
                                                                                         (0.127)                  (0.165)         
                                                                                                                                  
as.factor(Year)1965                                                                       0.061                    -0.132         
                                                                                         (0.130)                  (0.178)         
                                                                                                                                  
as.factor(Year)1966                                                                       0.156                    -0.038         
                                                                                         (0.130)                  (0.178)         
                                                                                                                                  
as.factor(Year)1967                                                                       0.072                    -0.121         
                                                                                         (0.130)                  (0.178)         
                                                                                                                                  
as.factor(Year)1978                                                                       0.064                    -0.010         
                                                                                         (0.125)                  (0.213)         
                                                                                                                                  
as.factor(Year)1980                                                                       0.106                    -0.054         
                                                                                         (0.109)                  (0.204)         
                                                                                                                                  
as.factor(Year)1981                                                                       0.111                    -0.134         
                                                                                         (0.129)                  (0.221)         
                                                                                                                                  
as.factor(Year)1982                                                                       0.053                    -0.115         
                                                                                         (0.103)                  (0.203)         
                                                                                                                                  
as.factor(Year)1983                                                                       0.066                    -0.138         
                                                                                         (0.110)                  (0.207)         
                                                                                                                                  
as.factor(Year)1984                                                                       0.015                    -0.124         
                                                                                         (0.103)                  (0.186)         
                                                                                                                                  
as.factor(Year)1985                                                                       -0.025                   -0.146         
                                                                                         (0.101)                  (0.205)         
                                                                                                                                  
as.factor(Year)1986                                                                       0.016                    -0.125         
                                                                                         (0.100)                  (0.157)         
                                                                                                                                  
as.factor(Year)1987                                                                       0.053                    -0.091         
                                                                                         (0.119)                  (0.185)         
                                                                                                                                  
as.factor(Year)1988                                                                       0.050                    -0.150         
                                                                                         (0.100)                  (0.164)         
                                                                                                                                  
as.factor(Year)1989                                                                       0.010                    -0.100         
                                                                                         (0.104)                  (0.153)         
                                                                                                                                  
as.factor(Year)1990                                                                       -0.024                   -0.028         
                                                                                         (0.096)                  (0.151)         
                                                                                                                                  
as.factor(Year)1991                                                                       0.018                    -0.076         
                                                                                         (0.101)                  (0.152)         
                                                                                                                                  
as.factor(Year)1992                                                                       -0.017                   -0.072         
                                                                                         (0.095)                  (0.147)         
                                                                                                                                  
as.factor(Year)1993                                                                       -0.016                   -0.014         
                                                                                         (0.096)                  (0.157)         
                                                                                                                                  
as.factor(Year)1994                                                                       0.004                    0.010          
                                                                                         (0.094)                  (0.146)         
                                                                                                                                  
as.factor(Year)1995                                                                       -0.053                   -0.028         
                                                                                         (0.097)                  (0.148)         
                                                                                                                                  
as.factor(Year)1996                                                                       -0.009                   -0.010         
                                                                                         (0.096)                  (0.140)         
                                                                                                                                  
as.factor(Year)1997                                                                       -0.002                   0.032          
                                                                                         (0.099)                  (0.144)         
                                                                                                                                  
as.factor(Year)1998                                                                       -0.019                   0.018          
                                                                                         (0.099)                  (0.157)         
                                                                                                                                  
as.factor(Year)1999                                                                       0.031                    -0.029         
                                                                                         (0.095)                  (0.144)         
                                                                                                                                  
as.factor(Year)2000                                                                       0.029                    -0.026         
                                                                                         (0.095)                  (0.146)         
                                                                                                                                  
as.factor(Year)2001                                                                       0.013                    -0.051         
                                                                                         (0.095)                  (0.143)         
                                                                                                                                  
as.factor(Year)2002                                                                       0.003                    -0.094         
                                                                                         (0.096)                  (0.149)         
                                                                                                                                  
as.factor(Year)2003                                                                       -0.032                   -0.108         
                                                                                         (0.095)                  (0.143)         
                                                                                                                                  
as.factor(Year)2004                                                                       -0.015                   -0.049         
                                                                                         (0.096)                  (0.141)         
                                                                                                                                  
as.factor(Year)2005                                                                       -0.030                   -0.049         
                                                                                         (0.095)                  (0.141)         
                                                                                                                                  
as.factor(Year)2006                                                                       -0.039                   -0.053         
                                                                                         (0.096)                  (0.141)         
                                                                                                                                  
as.factor(Year)2007                                                                       -0.015                   -0.082         
                                                                                         (0.095)                  (0.133)         
                                                                                                                                  
as.factor(Year)2008                                                                       -0.012                   -0.082         
                                                                                         (0.099)                  (0.136)         
                                                                                                                                  
as.factor(Year)2009                                                                       -0.017                   -0.080         
                                                                                         (0.096)                  (0.131)         
                                                                                                                                  
as.factor(Year)2010                                                                       -0.046                   -0.098         
                                                                                         (0.095)                  (0.131)         
                                                                                                                                  
as.factor(Year)2011                                                                       -0.037                   -0.075         
                                                                                         (0.095)                  (0.130)         
                                                                                                                                  
as.factor(Year)2012                                                                       -0.036                   -0.105         
                                                                                         (0.096)                  (0.131)         
                                                                                                                                  
as.factor(Year)2013                                                                       -0.033                   -0.103         
                                                                                         (0.096)                  (0.132)         
                                                                                                                                  
as.factor(Year)2014                                                                       -0.029                   -0.055         
                                                                                         (0.097)                  (0.142)         
                                                                                                                                  
as.factor(Year)2015                                                                       -0.039                   -0.094         
                                                                                         (0.096)                  (0.141)         
                                                                                                                                  
as.factor(Year)2016                                                                       -0.068                   -0.138         
                                                                                         (0.099)                  (0.123)         
                                                                                                                                  
as.factor(Year)2017                                                                       -0.044                   -0.114         
                                                                                         (0.099)                  (0.123)         
                                                                                                                                  
as.factor(Year)2018                                                                       -0.128                  -0.322**        
                                                                                         (0.107)                  (0.151)         
                                                                                                                                  
as.factor(Year)2019                                                                       -0.142                   -0.190         
                                                                                         (0.109)                  (0.129)         
                                                                                                                                  
as.factor(Coalition_ID)5                                                                                           0.017          
                                                                                                                  (0.114)         
                                                                                                                                  
as.factor(Coalition_ID)9                                                                                           -0.082         
                                                                                                                  (0.191)         
                                                                                                                                  
as.factor(Coalition_ID)11                                                                                          0.034          
                                                                                                                  (0.108)         
                                                                                                                                  
as.factor(Coalition_ID)12                                                                                          -0.142         
                                                                                                                  (0.114)         
                                                                                                                                  
as.factor(Coalition_ID)13                                                                                          -0.128         
                                                                                                                  (0.127)         
                                                                                                                                  
as.factor(Coalition_ID)14                                                                                          -0.038         
                                                                                                                  (0.093)         
                                                                                                                                  
as.factor(Coalition_ID)15                                                                                                         
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)18                                                                                                         
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)19                                                                                                         
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)20                                                                                                         
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)21                                                                                                         
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)22                                                                                                         
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)23                                                                                                         
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)24                                                                                                         
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)25                                                                                                         
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)26                                                                                                         
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)27                                                                                          0.118          
                                                                                                                  (0.163)         
                                                                                                                                  
as.factor(Coalition_ID)28                                                                                          -0.038         
                                                                                                                  (0.163)         
                                                                                                                                  
as.factor(Coalition_ID)29                                                                                          0.226          
                                                                                                                  (0.177)         
                                                                                                                                  
as.factor(Coalition_ID)30                                                                                          0.150          
                                                                                                                  (0.155)         
                                                                                                                                  
as.factor(Coalition_ID)31                                                                                          0.078          
                                                                                                                  (0.122)         
                                                                                                                                  
as.factor(Coalition_ID)32                                                                                          0.022          
                                                                                                                  (0.119)         
                                                                                                                                  
as.factor(Coalition_ID)33                                                                                          -0.021         
                                                                                                                  (0.135)         
                                                                                                                                  
as.factor(Coalition_ID)34                                                                                          -0.096         
                                                                                                                  (0.114)         
                                                                                                                                  
as.factor(Coalition_ID)35                                                                                          -0.111         
                                                                                                                  (0.125)         
                                                                                                                                  
as.factor(Coalition_ID)36                                                                                          -0.150         
                                                                                                                  (0.130)         
                                                                                                                                  
as.factor(Coalition_ID)37                                                                                          -0.048         
                                                                                                                  (0.097)         
                                                                                                                                  
as.factor(Coalition_ID)38                                                                                          0.021          
                                                                                                                  (0.108)         
                                                                                                                                  
as.factor(Coalition_ID)39                                                                                          -0.026         
                                                                                                                  (0.102)         
                                                                                                                                  
as.factor(Coalition_ID)40                                                                                          -0.048         
                                                                                                                  (0.093)         
                                                                                                                                  
as.factor(Coalition_ID)41                                                                                          0.011          
                                                                                                                  (0.063)         
                                                                                                                                  
as.factor(Coalition_ID)42                                                                                          0.007          
                                                                                                                  (0.094)         
                                                                                                                                  
as.factor(Coalition_ID)43                                                                                                         
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)44                                                                                                         
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)45                                                                                          -0.073         
                                                                                                                  (0.096)         
                                                                                                                                  
as.factor(Coalition_ID)46                                                                                                         
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)47                                                                                         -0.284*         
                                                                                                                  (0.147)         
                                                                                                                                  
as.factor(Coalition_ID)48                                                                                         -0.293*         
                                                                                                                  (0.167)         
                                                                                                                                  
as.factor(Coalition_ID)49                                                                                         -0.297*         
                                                                                                                  (0.161)         
                                                                                                                                  
as.factor(Coalition_ID)50                                                                                         -0.249*         
                                                                                                                  (0.142)         
                                                                                                                                  
as.factor(Coalition_ID)51                                                                                         -0.239*         
                                                                                                                  (0.126)         
                                                                                                                                  
as.factor(Coalition_ID)52                                                                                        -0.397***        
                                                                                                                  (0.122)         
                                                                                                                                  
as.factor(Coalition_ID)53                                                                                         -0.271**        
                                                                                                                  (0.135)         
                                                                                                                                  
as.factor(Coalition_ID)54                                                                                         -0.266**        
                                                                                                                  (0.135)         
                                                                                                                                  
as.factor(Coalition_ID)55                                                                                                         
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)56                                                                                          0.101          
                                                                                                                  (0.168)         
                                                                                                                                  
as.factor(Coalition_ID)58                                                                                          -0.007         
                                                                                                                  (0.143)         
                                                                                                                                  
as.factor(Coalition_ID)59                                                                                          0.084          
                                                                                                                  (0.115)         
                                                                                                                                  
as.factor(Coalition_ID)60                                                                                          0.079          
                                                                                                                  (0.147)         
                                                                                                                                  
as.factor(Coalition_ID)61                                                                                          0.118          
                                                                                                                  (0.133)         
                                                                                                                                  
as.factor(Coalition_ID)62                                                                                          -0.031         
                                                                                                                  (0.078)         
                                                                                                                                  
as.factor(Coalition_ID)63                                                                                          -0.106         
                                                                                                                  (0.110)         
                                                                                                                                  
as.factor(Coalition_ID)64                                                                                          0.034          
                                                                                                                  (0.087)         
                                                                                                                                  
as.factor(Coalition_ID)65                                                                                                         
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)66                                                                                                         
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)92                                                                                          0.067          
                                                                                                                  (0.212)         
                                                                                                                                  
as.factor(Coalition_ID)93                                                                                          0.337          
                                                                                                                  (0.223)         
                                                                                                                                  
as.factor(Coalition_ID)95                                                                                          -0.167         
                                                                                                                  (0.200)         
                                                                                                                                  
as.factor(Coalition_ID)96                                                                                          0.012          
                                                                                                                  (0.214)         
                                                                                                                                  
as.factor(Coalition_ID)97                                                                                          -0.100         
                                                                                                                  (0.221)         
                                                                                                                                  
as.factor(Coalition_ID)99                                                                                          0.193          
                                                                                                                  (0.121)         
                                                                                                                                  
as.factor(Coalition_ID)100                                                                                                        
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)104                                                                                         -0.011         
                                                                                                                  (0.104)         
                                                                                                                                  
as.factor(Coalition_ID)106                                                                                                        
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)109                                                                                                        
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)124                                                                                         0.042          
                                                                                                                  (0.176)         
                                                                                                                                  
as.factor(Coalition_ID)126                                                                                         -0.092         
                                                                                                                  (0.134)         
                                                                                                                                  
as.factor(Coalition_ID)127                                                                                         -0.172         
                                                                                                                  (0.129)         
                                                                                                                                  
as.factor(Coalition_ID)129                                                                                         0.008          
                                                                                                                  (0.134)         
                                                                                                                                  
as.factor(Coalition_ID)131                                                                                         0.032          
                                                                                                                  (0.149)         
                                                                                                                                  
as.factor(Coalition_ID)133                                                                                         -0.074         
                                                                                                                  (0.128)         
                                                                                                                                  
as.factor(Coalition_ID)134                                                                                                        
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)136                                                                                         -0.087         
                                                                                                                  (0.085)         
                                                                                                                                  
as.factor(Coalition_ID)137                                                                                         -0.089         
                                                                                                                  (0.088)         
                                                                                                                                  
as.factor(Coalition_ID)138                                                                                         -0.052         
                                                                                                                  (0.070)         
                                                                                                                                  
as.factor(Coalition_ID)139                                                                                                        
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)140                                                                                         0.090          
                                                                                                                  (0.117)         
                                                                                                                                  
as.factor(Coalition_ID)141                                                                                         -0.022         
                                                                                                                  (0.141)         
                                                                                                                                  
as.factor(Coalition_ID)142                                                                                         0.122          
                                                                                                                  (0.102)         
                                                                                                                                  
as.factor(Coalition_ID)143                                                                                                        
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)144                                                                                         0.165          
                                                                                                                  (0.149)         
                                                                                                                                  
as.factor(Coalition_ID)145                                                                                         0.118          
                                                                                                                  (0.100)         
                                                                                                                                  
as.factor(Coalition_ID)146                                                                                                        
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)153                                                                                         -0.169         
                                                                                                                  (0.163)         
                                                                                                                                  
as.factor(Coalition_ID)155                                                                                         -0.238         
                                                                                                                  (0.165)         
                                                                                                                                  
as.factor(Coalition_ID)156                                                                                         -0.066         
                                                                                                                  (0.143)         
                                                                                                                                  
as.factor(Coalition_ID)158                                                                                         0.020          
                                                                                                                  (0.112)         
                                                                                                                                  
as.factor(Coalition_ID)159                                                                                                        
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)161                                                                                         0.085          
                                                                                                                  (0.153)         
                                                                                                                                  
as.factor(Coalition_ID)162                                                                                         0.092          
                                                                                                                  (0.139)         
                                                                                                                                  
as.factor(Coalition_ID)164                                                                                         -0.014         
                                                                                                                  (0.123)         
                                                                                                                                  
as.factor(Coalition_ID)165                                                                                         -0.028         
                                                                                                                  (0.113)         
                                                                                                                                  
as.factor(Coalition_ID)166                                                                                         -0.073         
                                                                                                                  (0.117)         
                                                                                                                                  
as.factor(Coalition_ID)167                                                                                                        
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)169                                                                                         0.175          
                                                                                                                  (0.253)         
                                                                                                                                  
as.factor(Coalition_ID)171                                                                                         -0.177         
                                                                                                                  (0.216)         
                                                                                                                                  
as.factor(Coalition_ID)173                                                                                         0.045          
                                                                                                                  (0.084)         
                                                                                                                                  
as.factor(Coalition_ID)174                                                                                        -0.191*         
                                                                                                                  (0.106)         
                                                                                                                                  
as.factor(Coalition_ID)175                                                                                                        
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)178                                                                                         0.044          
                                                                                                                  (0.103)         
                                                                                                                                  
as.factor(Coalition_ID)179                                                                                                        
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)183                                                                                                        
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)193                                                                                         0.117          
                                                                                                                  (0.170)         
                                                                                                                                  
as.factor(Coalition_ID)194                                                                                                        
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)195                                                                                                        
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)198                                                                                                        
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)200                                                                                                        
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)206                                                                                         -0.213         
                                                                                                                  (0.140)         
                                                                                                                                  
as.factor(Coalition_ID)207                                                                                        -0.241**        
                                                                                                                  (0.115)         
                                                                                                                                  
as.factor(Coalition_ID)208                                                                                                        
                                                                                                                                  
                                                                                                                                  
as.factor(Coalition_ID)210                                                                                                        
                                                                                                                                  
                                                                                                                                  
Formateur:Presidential_Power           0.206**                  0.212**                  0.234***                 0.272***        
                                       (0.084)                  (0.084)                  (0.083)                  (0.083)         
                                                                                                                                  
Constant                                0.017                    0.013                    0.088                    0.297          
                                       (0.019)                  (0.019)                  (0.128)                  (0.361)         
                                                                                                                                  
----------------------------------------------------------------------------------------------------------------------------------
Observations                             656                      656                      656                      656           
R2                                      0.639                    0.642                    0.712                    0.760          
Adjusted R2                             0.637                    0.639                    0.671                    0.683          
Residual Std. Error                0.129 (df = 651)         0.129 (df = 649)         0.123 (df = 572)         0.120 (df = 495)    
F Statistic                    287.912*** (df = 4; 651) 193.890*** (df = 6; 649) 17.063*** (df = 83; 572) 9.821*** (df = 160; 495)
==================================================================================================================================
Note:                                                                                                  *p<0.1; **p<0.05; ***p<0.01

> ### Table F.1: Original Model and Model Including Single-Party Governments
> load(file="~/Downloads/PSRM Dataverse/pres_single_gov_Silva_2022.Rdata")

> main_int_model <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                        President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), 
+                      data=pres_port_master)

> single_party_model <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                            President_Majority  + Single_Party_Government + Formateur*Presidential_Power + 
+                            as.factor(Country) + as.factor(Year), 
+                          data=pres_single_gov)

> ## Combining Models in Table F.1
> stargazer(main_int_model, single_party_model,
+           type="text", out="~/Downloads/PSRM Dataverse/TableF1.txt")

=======================================================================================
                                                    Dependent variable:                
                                     --------------------------------------------------
                                                      Portfolio_Share                  
                                               (1)                       (2)           
---------------------------------------------------------------------------------------
Seat_Share_Contribution                      0.409***                 0.598***         
                                             (0.029)                   (0.028)         
                                                                                       
Formateur                                    0.089**                  0.113***         
                                             (0.037)                   (0.035)         
                                                                                       
Presidential_Power                            0.077                    -0.070          
                                             (0.195)                   (0.163)         
                                                                                       
Electoral_Year                               -0.0003                   -0.003          
                                             (0.012)                   (0.011)         
                                                                                       
President_Majority                            -0.002                    0.001          
                                             (0.023)                   (0.015)         
                                                                                       
Single_Party_Government                                               0.100***         
                                                                       (0.023)         
                                                                                       
as.factor(Country)Bolivia                     -0.014                   -0.030          
                                             (0.060)                   (0.040)         
                                                                                       
as.factor(Country)Brazil                      -0.065                   -0.041          
                                             (0.057)                   (0.038)         
                                                                                       
as.factor(Country)Burundi                     0.008                    -0.035          
                                             (0.079)                   (0.060)         
                                                                                       
as.factor(Country)Chile                       -0.061                   -0.032          
                                             (0.065)                   (0.046)         
                                                                                       
as.factor(Country)Colombia                    -0.021                   -0.004          
                                             (0.055)                   (0.034)         
                                                                                       
as.factor(Country)Costa Rica                                            0.012          
                                                                       (0.047)         
                                                                                       
as.factor(Country)Cyprus                                               -0.044          
                                                                       (0.134)         
                                                                                       
as.factor(Country)Dominican Republic                                   -0.003          
                                                                       (0.046)         
                                                                                       
as.factor(Country)Ecuador                   -0.196***                  -0.019          
                                             (0.060)                   (0.037)         
                                                                                       
as.factor(Country)El Salvador                 0.067                     0.005          
                                             (0.067)                   (0.040)         
                                                                                       
as.factor(Country)Ghana                       0.067                    -0.001          
                                             (0.103)                   (0.094)         
                                                                                       
as.factor(Country)Guatemala                                             0.021          
                                                                       (0.056)         
                                                                                       
as.factor(Country)Honduras                    0.017                    -0.012          
                                             (0.062)                   (0.039)         
                                                                                       
as.factor(Country)Indonesia                   -0.071                   -0.062          
                                             (0.091)                   (0.069)         
                                                                                       
as.factor(Country)Kenya                       -0.027                    0.019          
                                             (0.077)                   (0.058)         
                                                                                       
as.factor(Country)Malawi                      -0.092                   -0.009          
                                             (0.074)                   (0.055)         
                                                                                       
as.factor(Country)Mexico                                                0.008          
                                                                       (0.049)         
                                                                                       
as.factor(Country)Nicaragua                                            -0.016          
                                                                       (0.078)         
                                                                                       
as.factor(Country)Panama                      -0.026                   -0.0001         
                                             (0.064)                   (0.045)         
                                                                                       
as.factor(Country)Paraguay                    -0.022                    0.018          
                                             (0.065)                   (0.042)         
                                                                                       
as.factor(Country)Peru                       -0.128**                   0.011          
                                             (0.059)                   (0.041)         
                                                                                       
as.factor(Country)Peru1                                                 0.025          
                                                                       (0.083)         
                                                                                       
as.factor(Country)Peru2                                                 0.008          
                                                                       (0.093)         
                                                                                       
as.factor(Country)Philippines                -0.151**                  -0.001          
                                             (0.070)                   (0.048)         
                                                                                       
as.factor(Country)Sierra Leone                -0.071                   -0.012          
                                             (0.085)                   (0.056)         
                                                                                       
as.factor(Country)United States                                         0.010          
                                                                       (0.041)         
                                                                                       
as.factor(Country)Uruguay                     0.028                     0.004          
                                             (0.058)                   (0.038)         
                                                                                       
as.factor(Country)Venezuela                   -0.084                    0.014          
                                             (0.062)                   (0.039)         
                                                                                       
as.factor(Year)1947                           -0.000                   -0.000          
                                             (0.123)                   (0.122)         
                                                                                       
as.factor(Year)1950                           -0.072                   -0.003          
                                             (0.123)                   (0.122)         
                                                                                       
as.factor(Year)1951                           0.075                    -0.027          
                                             (0.114)                   (0.112)         
                                                                                       
as.factor(Year)1952                           -0.003                   -0.002          
                                             (0.126)                   (0.123)         
                                                                                       
as.factor(Year)1953                           -0.009                   -0.030          
                                             (0.115)                   (0.113)         
                                                                                       
as.factor(Year)1954                           0.020                    -0.041          
                                             (0.110)                   (0.107)         
                                                                                       
as.factor(Year)1955                           0.002                     0.009          
                                             (0.111)                   (0.108)         
                                                                                       
as.factor(Year)1956                           0.020                    -0.041          
                                             (0.110)                   (0.107)         
                                                                                       
as.factor(Year)1957                           0.103                     0.042          
                                             (0.116)                   (0.113)         
                                                                                       
as.factor(Year)1958                           0.051                    -0.041          
                                             (0.110)                   (0.107)         
                                                                                       
as.factor(Year)1960                           0.023                    -0.045          
                                             (0.111)                   (0.108)         
                                                                                       
as.factor(Year)1961                           -0.001                   -0.043          
                                             (0.103)                   (0.101)         
                                                                                       
as.factor(Year)1962                           -0.022                   -0.043          
                                             (0.103)                   (0.101)         
                                                                                       
as.factor(Year)1963                           -0.009                   -0.046          
                                             (0.127)                   (0.125)         
                                                                                       
as.factor(Year)1964                                                    -0.031          
                                                                       (0.153)         
                                                                                       
as.factor(Year)1965                           0.061                    -0.045          
                                             (0.130)                   (0.126)         
                                                                                       
as.factor(Year)1966                           0.156                    -0.038          
                                             (0.130)                   (0.108)         
                                                                                       
as.factor(Year)1967                           0.072                    -0.045          
                                             (0.130)                   (0.126)         
                                                                                       
as.factor(Year)1968                                                    -0.034          
                                                                       (0.153)         
                                                                                       
as.factor(Year)1969                                                    -0.032          
                                                                       (0.125)         
                                                                                       
as.factor(Year)1970                                                    -0.032          
                                                                       (0.115)         
                                                                                       
as.factor(Year)1971                                                    -0.034          
                                                                       (0.153)         
                                                                                       
as.factor(Year)1972                                                    -0.034          
                                                                       (0.153)         
                                                                                       
as.factor(Year)1973                                                    -0.034          
                                                                       (0.125)         
                                                                                       
as.factor(Year)1974                                                    -0.031          
                                                                       (0.114)         
                                                                                       
as.factor(Year)1975                                                    -0.036          
                                                                       (0.152)         
                                                                                       
as.factor(Year)1977                                                    -0.035          
                                                                       (0.124)         
                                                                                       
as.factor(Year)1978                           0.064                    -0.034          
                                             (0.125)                   (0.101)         
                                                                                       
as.factor(Year)1979                                                    -0.025          
                                                                       (0.125)         
                                                                                       
as.factor(Year)1980                           0.106                    -0.036          
                                             (0.109)                   (0.104)         
                                                                                       
as.factor(Year)1981                           0.111                    -0.037          
                                             (0.129)                   (0.109)         
                                                                                       
as.factor(Year)1982                           0.053                    -0.032          
                                             (0.103)                   (0.097)         
                                                                                       
as.factor(Year)1983                           0.066                    -0.035          
                                             (0.110)                   (0.102)         
                                                                                       
as.factor(Year)1984                           0.015                    -0.037          
                                             (0.103)                   (0.099)         
                                                                                       
as.factor(Year)1985                           -0.025                   -0.028          
                                             (0.101)                   (0.095)         
                                                                                       
as.factor(Year)1986                           0.016                    -0.038          
                                             (0.100)                   (0.094)         
                                                                                       
as.factor(Year)1987                           0.053                    -0.035          
                                             (0.119)                   (0.103)         
                                                                                       
as.factor(Year)1988                           0.050                    -0.031          
                                             (0.100)                   (0.097)         
                                                                                       
as.factor(Year)1989                           0.010                     0.003          
                                             (0.104)                   (0.096)         
                                                                                       
as.factor(Year)1990                           -0.024                   -0.020          
                                             (0.096)                   (0.093)         
                                                                                       
as.factor(Year)1991                           0.018                    -0.037          
                                             (0.101)                   (0.095)         
                                                                                       
as.factor(Year)1992                           -0.017                   -0.032          
                                             (0.095)                   (0.092)         
                                                                                       
as.factor(Year)1993                           -0.016                   -0.022          
                                             (0.096)                   (0.093)         
                                                                                       
as.factor(Year)1994                           0.004                    -0.013          
                                             (0.094)                   (0.092)         
                                                                                       
as.factor(Year)1995                           -0.053                   -0.044          
                                             (0.097)                   (0.094)         
                                                                                       
as.factor(Year)1996                           -0.009                   -0.045          
                                             (0.096)                   (0.093)         
                                                                                       
as.factor(Year)1997                           -0.002                   -0.026          
                                             (0.099)                   (0.095)         
                                                                                       
as.factor(Year)1998                           -0.019                   -0.037          
                                             (0.099)                   (0.093)         
                                                                                       
as.factor(Year)1999                           0.031                    -0.049          
                                             (0.095)                   (0.092)         
                                                                                       
as.factor(Year)2000                           0.029                    -0.041          
                                             (0.095)                   (0.092)         
                                                                                       
as.factor(Year)2001                           0.013                    -0.038          
                                             (0.095)                   (0.092)         
                                                                                       
as.factor(Year)2002                           0.003                    -0.030          
                                             (0.096)                   (0.092)         
                                                                                       
as.factor(Year)2003                           -0.032                   -0.043          
                                             (0.095)                   (0.092)         
                                                                                       
as.factor(Year)2004                           -0.015                   -0.028          
                                             (0.096)                   (0.092)         
                                                                                       
as.factor(Year)2005                           -0.030                   -0.033          
                                             (0.095)                   (0.092)         
                                                                                       
as.factor(Year)2006                           -0.039                   -0.040          
                                             (0.096)                   (0.092)         
                                                                                       
as.factor(Year)2007                           -0.015                   -0.045          
                                             (0.095)                   (0.092)         
                                                                                       
as.factor(Year)2008                           -0.012                   -0.047          
                                             (0.099)                   (0.094)         
                                                                                       
as.factor(Year)2009                           -0.017                   -0.049          
                                             (0.096)                   (0.092)         
                                                                                       
as.factor(Year)2010                           -0.046                   -0.052          
                                             (0.095)                   (0.091)         
                                                                                       
as.factor(Year)2011                           -0.037                   -0.049          
                                             (0.095)                   (0.092)         
                                                                                       
as.factor(Year)2012                           -0.036                   -0.052          
                                             (0.096)                   (0.092)         
                                                                                       
as.factor(Year)2013                           -0.033                   -0.053          
                                             (0.096)                   (0.092)         
                                                                                       
as.factor(Year)2014                           -0.029                   -0.061          
                                             (0.097)                   (0.093)         
                                                                                       
as.factor(Year)2015                           -0.039                   -0.062          
                                             (0.096)                   (0.093)         
                                                                                       
as.factor(Year)2016                           -0.068                   -0.064          
                                             (0.099)                   (0.095)         
                                                                                       
as.factor(Year)2017                           -0.044                   -0.063          
                                             (0.099)                   (0.094)         
                                                                                       
as.factor(Year)2018                           -0.128                   -0.011          
                                             (0.107)                   (0.097)         
                                                                                       
as.factor(Year)2019                           -0.142                   -0.038          
                                             (0.109)                   (0.101)         
                                                                                       
as.factor(Year)2020                                                    -0.044          
                                                                       (0.158)         
                                                                                       
Formateur:Presidential_Power                 0.234***                 0.266***         
                                             (0.083)                   (0.080)         
                                                                                       
Constant                                      0.088                     0.159          
                                             (0.128)                   (0.112)         
                                                                                       
---------------------------------------------------------------------------------------
Observations                                   656                       831           
R2                                            0.712                     0.899          
Adjusted R2                                   0.671                     0.884          
Residual Std. Error                      0.123 (df = 572)         0.122 (df = 725)     
F Statistic                          17.063*** (df = 83; 572) 61.232*** (df = 105; 725)
=======================================================================================
Note:                                                       *p<0.1; **p<0.05; ***p<0.01

> ### Figure G.1: Robustness Test: Removing One Country at a Time
> arg_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Argentina"))

> bol_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Bolivia"))

> bra_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Brazil"))

> bur_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Burundi"))

> chi_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Chile"))

> col_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Colombia"))

> ecu_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Ecuador"))

> els_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="El Salvador"))

> gha_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Ghana"))

> hon_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Honduras"))

> ind_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Indonesia"))

> ken_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Kenya"))

> mal_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Malawi"))

> pan_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Panama"))

> par_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Paraguay"))

> per_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Peru"))

> phi_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Philippines"))

> sie_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Sierra Leone"))

> uru_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Uruguay"))

> ven_mod <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year), subset(pres_port_master, Country!="Venezuela"))

> pdf("~/Downloads/PSRM Dataverse/Figure_G1.pdf",
+     width=8,height=6) 

> plot_summs(arg_mod,
+            bol_mod,
+            bra_mod,
+            bur_mod,
+            chi_mod,
+            col_mod,
+            ecu_mod,
+            els_mod,
+            gha_mod,
+            hon_mod, 
+            ind_mod,
+            ken_mod,
+            mal_mod,
+            pan_mod,
+            par_mod,
+            per_mod,
+            phi_mod,
+            sie_mod,
+            uru_mod,
+            ven_mod,
+            coefs = c("Formateur x \n Presidential Power" = "Formateur:Presidential_Power"),
+            colors = "Rainbow",
+            ci_level = 0.95,
+            inner_ci_level = .9,
+            point.shape = FALSE, 
+            model.names = unique(pres_port_master$Country),
+            legend.title = "Country Removed:") + theme_few() + ylab("")

> dev.off()
null device 
          1 

> ### Figure G.2: DFBETAS for the Estimation of the Interactive Term Between Formateur
> ### and Presidential Power
> 
> # Calculate DFBETAS for each observation in the model
> dfbetas <- as.data.frame(dfbetas(main_int_model))

> # Figure G.2 
> pdf("~/Downloads/PSRM Dataverse/Figure_G2.pdf",
+     width=8,height=6) 

> dfbetaPlots(main_int_model, terms= "Formateur:Presidential_Power", id.n=5, xlab="N", 
+             ylab="Formateur x Presidential Power")

> dev.off()
null device 
          1 

> ### Table G.1: DFBETA: Influential Observations
> # Table G.1 generated from information extracted from Figure G.2, 
> # in which large values of DFBETAS are indicated, labeling observations that are
> # influential in estimating the coefficient of interest.
> # Obs. Country (Year) DFBETA
> # 488 Kenya (2009) 0.337
> # 486 Kenya (2008) 0.334
> # 476 Indonesia (2013) 0.319
> # 504 Malawi (2009) -0.240
> # 492 Kenya 2014 -0.288
> 
> ### Figure G.3: Estimate for the Interactive Term Between Formateur and Presidential
> ### Power in the Original Model (Model 1) and the Model Without the Identified Influential
> ### Observations (Model 2)
> clear_df <- pres_port_master[ -c(476, 486, 488, 492, 504), ] 

> df_model <- lm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + President_Majority  + 
+                  Formateur*Presidential_Power + as.factor(Country) + as.factor(Year) + as.factor(Country) + as.factor(Year), 
+                data=clear_df)

> pdf("~/Downloads/PSRM Dataverse/Figure_G3.pdf",
+     width=8,height=6) 

> plot_summs(main_int_model,
+            df_model,
+            coefs = c("Formateur x \n Presidential Power" = "Formateur:Presidential_Power"),
+            colors = "Qual1",
+            ci_level = 0.95,
+            inner_ci_level = .9,
+            point.shape = FALSE, 
+            legend.title = "") + theme_few() + ylab("")

> dev.off()
null device 
          1 

> ### Table G.2: Comparing the Results from the Original OLS Model and the Robust Regression
> robust <- rlm(Portfolio_Share ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                 President_Majority  + Formateur*Presidential_Power + as.factor(Country) + as.factor(Year) + as.factor(Country) + as.factor(Year), 
+               data=pres_port_master)

> stargazer(main_int_model, robust, type="text", 
+           out="~/Downloads/PSRM Dataverse/TableG2.txt")

=================================================================
                                      Dependent variable:        
                               ----------------------------------
                                        Portfolio_Share          
                                         OLS             robust  
                                                         linear  
                                         (1)               (2)   
-----------------------------------------------------------------
Seat_Share_Contribution                0.409***         0.400*** 
                                       (0.029)           (0.025) 
                                                                 
Formateur                              0.089**           0.058*  
                                       (0.037)           (0.032) 
                                                                 
Presidential_Power                      0.077            -0.015  
                                       (0.195)           (0.171) 
                                                                 
Electoral_Year                         -0.0003            0.001  
                                       (0.012)           (0.011) 
                                                                 
President_Majority                      -0.002            0.012  
                                       (0.023)           (0.020) 
                                                                 
as.factor(Country)Bolivia               -0.014           -0.027  
                                       (0.060)           (0.053) 
                                                                 
as.factor(Country)Brazil                -0.065           -0.059  
                                       (0.057)           (0.050) 
                                                                 
as.factor(Country)Burundi               0.008             0.012  
                                       (0.079)           (0.070) 
                                                                 
as.factor(Country)Chile                 -0.061           -0.038  
                                       (0.065)           (0.057) 
                                                                 
as.factor(Country)Colombia              -0.021           -0.016  
                                       (0.055)           (0.048) 
                                                                 
as.factor(Country)Ecuador             -0.196***         -0.175***
                                       (0.060)           (0.052) 
                                                                 
as.factor(Country)El Salvador           0.067             0.060  
                                       (0.067)           (0.058) 
                                                                 
as.factor(Country)Ghana                 0.067             0.065  
                                       (0.103)           (0.090) 
                                                                 
as.factor(Country)Honduras              0.017            -0.007  
                                       (0.062)           (0.054) 
                                                                 
as.factor(Country)Indonesia             -0.071           -0.098  
                                       (0.091)           (0.079) 
                                                                 
as.factor(Country)Kenya                 -0.027           -0.023  
                                       (0.077)           (0.067) 
                                                                 
as.factor(Country)Malawi                -0.092           -0.045  
                                       (0.074)           (0.065) 
                                                                 
as.factor(Country)Panama                -0.026           -0.041  
                                       (0.064)           (0.056) 
                                                                 
as.factor(Country)Paraguay              -0.022           -0.043  
                                       (0.065)           (0.057) 
                                                                 
as.factor(Country)Peru                 -0.128**         -0.122** 
                                       (0.059)           (0.052) 
                                                                 
as.factor(Country)Philippines          -0.151**         -0.145** 
                                       (0.070)           (0.062) 
                                                                 
as.factor(Country)Sierra Leone          -0.071           -0.077  
                                       (0.085)           (0.074) 
                                                                 
as.factor(Country)Uruguay               0.028             0.024  
                                       (0.058)           (0.051) 
                                                                 
as.factor(Country)Venezuela             -0.084          -0.107** 
                                       (0.062)           (0.054) 
                                                                 
as.factor(Year)1947                     -0.000            0.000  
                                       (0.123)           (0.108) 
                                                                 
as.factor(Year)1950                     -0.072           -0.070  
                                       (0.123)           (0.108) 
                                                                 
as.factor(Year)1951                     0.075             0.032  
                                       (0.114)           (0.100) 
                                                                 
as.factor(Year)1952                     -0.003            0.013  
                                       (0.126)           (0.110) 
                                                                 
as.factor(Year)1953                     -0.009            0.055  
                                       (0.115)           (0.101) 
                                                                 
as.factor(Year)1954                     0.020             0.053  
                                       (0.110)           (0.096) 
                                                                 
as.factor(Year)1955                     0.002             0.015  
                                       (0.111)           (0.097) 
                                                                 
as.factor(Year)1956                     0.020             0.053  
                                       (0.110)           (0.096) 
                                                                 
as.factor(Year)1957                     0.103             0.117  
                                       (0.116)           (0.102) 
                                                                 
as.factor(Year)1958                     0.051             0.061  
                                       (0.110)           (0.096) 
                                                                 
as.factor(Year)1960                     0.023             0.035  
                                       (0.111)           (0.097) 
                                                                 
as.factor(Year)1961                     -0.001            0.020  
                                       (0.103)           (0.090) 
                                                                 
as.factor(Year)1962                     -0.022            0.027  
                                       (0.103)           (0.090) 
                                                                 
as.factor(Year)1963                     -0.009            0.013  
                                       (0.127)           (0.112) 
                                                                 
as.factor(Year)1965                     0.061             0.097  
                                       (0.130)           (0.114) 
                                                                 
as.factor(Year)1966                     0.156            0.192*  
                                       (0.130)           (0.114) 
                                                                 
as.factor(Year)1967                     0.072             0.109  
                                       (0.130)           (0.114) 
                                                                 
as.factor(Year)1978                     0.064             0.064  
                                       (0.125)           (0.109) 
                                                                 
as.factor(Year)1980                     0.106             0.102  
                                       (0.109)           (0.095) 
                                                                 
as.factor(Year)1981                     0.111             0.102  
                                       (0.129)           (0.113) 
                                                                 
as.factor(Year)1982                     0.053             0.086  
                                       (0.103)           (0.091) 
                                                                 
as.factor(Year)1983                     0.066             0.102  
                                       (0.110)           (0.096) 
                                                                 
as.factor(Year)1984                     0.015             0.021  
                                       (0.103)           (0.090) 
                                                                 
as.factor(Year)1985                     -0.025           -0.032  
                                       (0.101)           (0.089) 
                                                                 
as.factor(Year)1986                     0.016             0.023  
                                       (0.100)           (0.088) 
                                                                 
as.factor(Year)1987                     0.053             0.049  
                                       (0.119)           (0.104) 
                                                                 
as.factor(Year)1988                     0.050             0.034  
                                       (0.100)           (0.088) 
                                                                 
as.factor(Year)1989                     0.010             0.009  
                                       (0.104)           (0.091) 
                                                                 
as.factor(Year)1990                     -0.024           -0.025  
                                       (0.096)           (0.084) 
                                                                 
as.factor(Year)1991                     0.018             0.010  
                                       (0.101)           (0.089) 
                                                                 
as.factor(Year)1992                     -0.017            0.006  
                                       (0.095)           (0.083) 
                                                                 
as.factor(Year)1993                     -0.016            0.016  
                                       (0.096)           (0.084) 
                                                                 
as.factor(Year)1994                     0.004             0.017  
                                       (0.094)           (0.082) 
                                                                 
as.factor(Year)1995                     -0.053           -0.032  
                                       (0.097)           (0.085) 
                                                                 
as.factor(Year)1996                     -0.009            0.004  
                                       (0.096)           (0.084) 
                                                                 
as.factor(Year)1997                     -0.002            0.001  
                                       (0.099)           (0.087) 
                                                                 
as.factor(Year)1998                     -0.019           -0.012  
                                       (0.099)           (0.086) 
                                                                 
as.factor(Year)1999                     0.031             0.041  
                                       (0.095)           (0.083) 
                                                                 
as.factor(Year)2000                     0.029             0.033  
                                       (0.095)           (0.083) 
                                                                 
as.factor(Year)2001                     0.013             0.033  
                                       (0.095)           (0.083) 
                                                                 
as.factor(Year)2002                     0.003             0.029  
                                       (0.096)           (0.084) 
                                                                 
as.factor(Year)2003                     -0.032           -0.009  
                                       (0.095)           (0.084) 
                                                                 
as.factor(Year)2004                     -0.015           -0.016  
                                       (0.096)           (0.084) 
                                                                 
as.factor(Year)2005                     -0.030           -0.025  
                                       (0.095)           (0.084) 
                                                                 
as.factor(Year)2006                     -0.039           -0.031  
                                       (0.096)           (0.084) 
                                                                 
as.factor(Year)2007                     -0.015           -0.014  
                                       (0.095)           (0.083) 
                                                                 
as.factor(Year)2008                     -0.012           -0.003  
                                       (0.099)           (0.086) 
                                                                 
as.factor(Year)2009                     -0.017           0.0003  
                                       (0.096)           (0.084) 
                                                                 
as.factor(Year)2010                     -0.046           -0.023  
                                       (0.095)           (0.083) 
                                                                 
as.factor(Year)2011                     -0.037           -0.010  
                                       (0.095)           (0.083) 
                                                                 
as.factor(Year)2012                     -0.036           -0.006  
                                       (0.096)           (0.084) 
                                                                 
as.factor(Year)2013                     -0.033           -0.004  
                                       (0.096)           (0.084) 
                                                                 
as.factor(Year)2014                     -0.029           -0.006  
                                       (0.097)           (0.085) 
                                                                 
as.factor(Year)2015                     -0.039           -0.020  
                                       (0.096)           (0.084) 
                                                                 
as.factor(Year)2016                     -0.068           -0.045  
                                       (0.099)           (0.086) 
                                                                 
as.factor(Year)2017                     -0.044           -0.034  
                                       (0.099)           (0.086) 
                                                                 
as.factor(Year)2018                     -0.128           -0.090  
                                       (0.107)           (0.094) 
                                                                 
as.factor(Year)2019                     -0.142           -0.094  
                                       (0.109)           (0.096) 
                                                                 
Formateur:Presidential_Power           0.234***         0.330*** 
                                       (0.083)           (0.073) 
                                                                 
Constant                                0.088             0.106  
                                       (0.128)           (0.112) 
                                                                 
-----------------------------------------------------------------
Observations                             656               656   
R2                                      0.712                    
Adjusted R2                             0.671                    
Residual Std. Error (df = 572)          0.123             0.087  
F Statistic                    17.063*** (df = 83; 572)          
=================================================================
Note:                                 *p<0.1; **p<0.05; ***p<0.01

> ### Figure H.1: Weighted Portfolio Share
> ### (Increasing the Importance of the Ministry of Finance)
> main_int_weight2 <- lm(weight_port2 ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                          President_Majority  + Formateur*Presidential_Power +
+                          as.factor(Country) + as.factor(Year), data=pres_port_master)

> main_int_weight3 <- lm(weight_port3 ~ Seat_Share_Contribution + Formateur + Presidential_Power + Electoral_Year + 
+                          President_Majority  + Formateur*Presidential_Power +
+                          as.factor(Country) + as.factor(Year), data=pres_port_master)

> pdf("~/Downloads/PSRM Dataverse/Figure_H1.pdf",
+     width=7,height=5) 

> plot_models(main_int_model, main_int_weight2, main_int_weight3, rm.terms = c("as.factor(Year)1947", 
+                                                                              "as.factor(Year)1950", "as.factor(Year)1951",
+                                                                              "as.factor(Year)1952", "as.factor(Year)1953", 
+                                                                              "as.factor(Year)1954", "as.factor(Year)1955", 
+                                                                              "as.factor(Year)1956", "as.factor(Year)1957", 
+                                                                              "as.factor(Year)1958", "as.factor(Year)1960", 
+                                                                              "as.factor(Year)1961", "as.factor(Year)1962", 
+                                                                              "as.factor(Year)1963", "as.factor(Year)1965", 
+                                                                              "as.factor(Year)1966", "as.factor(Year)1967", 
+                                                                              "as.factor(Year)1978", "as.factor(Year)1980", 
+                                                                              "as.factor(Year)1981", "as.factor(Year)1982", 
+                                                                              "as.factor(Year)1983", "as.factor(Year)1984", 
+                                                                              "as.factor(Year)1985", "as.factor(Year)1986", 
+                                                                              "as.factor(Year)1987", "as.factor(Year)1988", 
+                                                                              "as.factor(Year)1989", "as.factor(Year)1990", 
+                                                                              "as.factor(Year)1991", "as.factor(Year)1992", 
+                                                                              "as.factor(Year)1993", "as.factor(Year)1994", 
+                                                                              "as.factor(Year)1995", "as.factor(Year)1996", 
+                                                                              "as.factor(Year)1997", "as.factor(Year)1998", 
+                                                                              "as.factor(Year)1999", "as.factor(Year)2000", 
+                                                                              "as.factor(Year)2001", "as.factor(Year)2002", 
+                                                                              "as.factor(Year)2003", "as.factor(Year)2004", 
+                                                                              "as.factor(Year)2005", "as.factor(Year)2006", 
+                                                                              "as.factor(Year)2007", "as.factor(Year)2008", 
+                                                                              "as.factor(Year)2009", "as.factor(Year)2010",
+                                                                              "as.factor(Year)2011", "as.factor(Year)2012", 
+                                                                              "as.factor(Year)2013", "as.factor(Year)2014", 
+                                                                              "as.factor(Year)2015", "as.factor(Year)2016", 
+                                                                              "as.factor(Year)2017", "as.factor(Year)2018", 
+                                                                              "as.factor(Year)2019", "as.factor(Country)Bolivia", 
+                                                                              "as.factor(Country)Brazil",  "as.factor(Country)Burundi", 
+                                                                              "as.factor(Country)Chile", "as.factor(Country)Colombia", 
+                                                                              "as.factor(Country)Ecuador", "as.factor(Country)El Salvador", 
+                                                                              "as.factor(Country)Ghana",  "as.factor(Country)Honduras", 
+                                                                              "as.factor(Country)Indonesia",  "as.factor(Country)Kenya", 
+                                                                              "as.factor(Country)Malawi",  "as.factor(Country)Panama", 
+                                                                              "as.factor(Country)Paraguay",  "as.factor(Country)Peru", 
+                                                                              "as.factor(Country)Philippines",  "as.factor(Country)Sierra Leone", 
+                                                                              "as.factor(Country)Uruguay",  "as.factor(Country)Venezuela",
+                                                                              "Seat_Share_Contribution",  "Formateur", "Presidential_Power", "Electoral_Year", "President_Majority"),
+             colors = "Dark2", legend.title = "DV:",      
+             m.labels = c("Non-Weighted Portfolio Share", "Weighted Portfolio Share (Factor 2)", "Weighted Portfolio Share (Factor 3)"),
+             show.values=TRUE, 
+             show.p = F, 
+             axis.labels = c("Formateur x \n Presidential Power"),
+             show.intercept = FALSE) +
+   geom_hline(yintercept=0, lty=2, lwd=0.6, colour="black")  +
+   ylab("Estimates") +   
+   theme(axis.title.x = element_text(size = 12),
+         axis.text.x = element_text(size = 14),
+         axis.text.y = element_text(size = 11, face="bold")) + 
+   theme(plot.title = element_blank()) +
+   theme_bw() + theme(legend.position="bottom") +
+   ylim(-.05, 0.7)
Scale for 'y' is already present. Adding another scale for 'y',
which will replace the existing scale.

> dev.off()
null device 
          1 

> ### Table H.1: Robustness Test: Weighted Portfolio Share
> ### (Increasing the Importance of the Ministry of Finance)
> stargazer(main_int_weight2, main_int_weight3, type="text", 
+           out="~/Downloads/PSRM Dataverse/TableH1.txt")

===========================================================
                                   Dependent variable:     
                               ----------------------------
                                weight_port2  weight_port3 
                                    (1)            (2)     
-----------------------------------------------------------
Seat_Share_Contribution           0.544***      0.527***   
                                  (0.033)        (0.034)   
                                                           
Formateur                         0.117***      0.109***   
                                  (0.040)        (0.041)   
                                                           
Presidential_Power                 -0.057        -0.087    
                                  (0.213)        (0.220)   
                                                           
Electoral_Year                     -0.007        -0.009    
                                  (0.014)        (0.014)   
                                                           
President_Majority                 0.003          0.002    
                                  (0.026)        (0.027)   
                                                           
as.factor(Country)Bolivia          -0.040        -0.051    
                                  (0.065)        (0.067)   
                                                           
as.factor(Country)Brazil           -0.048        -0.056    
                                  (0.062)        (0.064)   
                                                           
as.factor(Country)Burundi          -0.038        -0.036    
                                  (0.087)        (0.090)   
                                                           
as.factor(Country)Chile            -0.045        -0.052    
                                  (0.071)        (0.073)   
                                                           
as.factor(Country)Colombia         -0.001        -0.005    
                                  (0.059)        (0.061)   
                                                           
as.factor(Country)Ecuador          -0.067        -0.101    
                                  (0.065)        (0.067)   
                                                           
as.factor(Country)El Salvador      0.014          0.003    
                                  (0.072)        (0.074)   
                                                           
as.factor(Country)Ghana            0.009          0.013    
                                  (0.111)        (0.115)   
                                                           
as.factor(Country)Honduras         -0.015        -0.018    
                                  (0.067)        (0.069)   
                                                           
as.factor(Country)Indonesia        -0.071        -0.098    
                                  (0.098)        (0.101)   
                                                           
as.factor(Country)Kenya            -0.002        -0.015    
                                  (0.084)        (0.086)   
                                                           
as.factor(Country)Malawi           -0.012        -0.011    
                                  (0.080)        (0.083)   
                                                           
as.factor(Country)Panama           0.010          0.010    
                                  (0.069)        (0.072)   
                                                           
as.factor(Country)Paraguay         0.002         -0.025    
                                  (0.070)        (0.072)   
                                                           
as.factor(Country)Peru             -0.028        -0.063    
                                  (0.064)        (0.066)   
                                                           
as.factor(Country)Philippines      -0.047        -0.085    
                                  (0.076)        (0.079)   
                                                           
as.factor(Country)Sierra Leone     -0.010        -0.014    
                                  (0.093)        (0.096)   
                                                           
as.factor(Country)Uruguay          0.005          0.002    
                                  (0.062)        (0.064)   
                                                           
as.factor(Country)Venezuela        -0.015        -0.051    
                                  (0.069)        (0.071)   
                                                           
as.factor(Year)1962                0.016          0.025    
                                  (0.132)        (0.137)   
                                                           
as.factor(Year)1963                0.009          0.014    
                                  (0.132)        (0.137)   
                                                           
as.factor(Year)1965                0.019          0.027    
                                  (0.135)        (0.139)   
                                                           
as.factor(Year)1966                0.074          0.127    
                                  (0.135)        (0.139)   
                                                           
as.factor(Year)1967                0.074          0.127    
                                  (0.135)        (0.139)   
                                                           
as.factor(Year)1978                0.048          0.073    
                                  (0.139)        (0.144)   
                                                           
as.factor(Year)1980                0.069          0.108    
                                  (0.122)        (0.126)   
                                                           
as.factor(Year)1981                0.091          0.143    
                                  (0.142)        (0.147)   
                                                           
as.factor(Year)1982                0.070          0.103    
                                  (0.117)        (0.121)   
                                                           
as.factor(Year)1983                0.067          0.104    
                                  (0.123)        (0.127)   
                                                           
as.factor(Year)1984                0.067          0.101    
                                  (0.116)        (0.120)   
                                                           
as.factor(Year)1985                0.051          0.063    
                                  (0.114)        (0.118)   
                                                           
as.factor(Year)1986                0.048          0.075    
                                  (0.113)        (0.117)   
                                                           
as.factor(Year)1987                0.030          0.045    
                                  (0.131)        (0.136)   
                                                           
as.factor(Year)1988                0.045          0.058    
                                  (0.113)        (0.117)   
                                                           
as.factor(Year)1989                0.104          0.116    
                                  (0.118)        (0.121)   
                                                           
as.factor(Year)1990                0.056          0.069    
                                  (0.110)        (0.114)   
                                                           
as.factor(Year)1991                0.046          0.070    
                                  (0.114)        (0.118)   
                                                           
as.factor(Year)1992                0.046          0.068    
                                  (0.106)        (0.110)   
                                                           
as.factor(Year)1993                0.058          0.076    
                                  (0.109)        (0.112)   
                                                           
as.factor(Year)1994                0.063          0.079    
                                  (0.106)        (0.110)   
                                                           
as.factor(Year)1995                0.032          0.049    
                                  (0.109)        (0.113)   
                                                           
as.factor(Year)1996                0.032          0.049    
                                  (0.107)        (0.110)   
                                                           
as.factor(Year)1997                0.075          0.102    
                                  (0.109)        (0.113)   
                                                           
as.factor(Year)1998                0.036          0.054    
                                  (0.112)        (0.116)   
                                                           
as.factor(Year)1999                0.031          0.052    
                                  (0.107)        (0.110)   
                                                           
as.factor(Year)2000                0.044          0.067    
                                  (0.109)        (0.112)   
                                                           
as.factor(Year)2001                0.038          0.055    
                                  (0.107)        (0.111)   
                                                           
as.factor(Year)2002                0.054          0.072    
                                  (0.109)        (0.112)   
                                                           
as.factor(Year)2003                0.049          0.081    
                                  (0.109)        (0.113)   
                                                           
as.factor(Year)2004                0.045          0.060    
                                  (0.108)        (0.112)   
                                                           
as.factor(Year)2005                0.046          0.064    
                                  (0.109)        (0.113)   
                                                           
as.factor(Year)2006                0.039          0.058    
                                  (0.110)        (0.113)   
                                                           
as.factor(Year)2007                0.035          0.055    
                                  (0.109)        (0.112)   
                                                           
as.factor(Year)2008                0.027          0.042    
                                  (0.112)        (0.116)   
                                                           
as.factor(Year)2009                0.028          0.048    
                                  (0.110)        (0.113)   
                                                           
as.factor(Year)2010                0.025          0.045    
                                  (0.109)        (0.112)   
                                                           
as.factor(Year)2011                0.025          0.043    
                                  (0.109)        (0.112)   
                                                           
as.factor(Year)2012                0.022          0.043    
                                  (0.109)        (0.112)   
                                                           
as.factor(Year)2013                0.017          0.034    
                                  (0.109)        (0.113)   
                                                           
as.factor(Year)2014                0.016          0.041    
                                  (0.111)        (0.115)   
                                                           
as.factor(Year)2015                0.014          0.035    
                                  (0.110)        (0.114)   
                                                           
as.factor(Year)2016                0.009          0.031    
                                  (0.112)        (0.116)   
                                                           
as.factor(Year)2017                0.009          0.031    
                                  (0.112)        (0.116)   
                                                           
as.factor(Year)2018                0.098          0.113    
                                  (0.122)        (0.126)   
                                                           
as.factor(Year)2019                0.010          0.010    
                                  (0.125)        (0.129)   
                                                           
Formateur:Presidential_Power      0.335***      0.369***   
                                  (0.090)        (0.093)   
                                                           
Constant                           0.082          0.081    
                                  (0.141)        (0.146)   
                                                           
-----------------------------------------------------------
Observations                        611            611     
R2                                 0.779          0.766    
Adjusted R2                        0.750          0.736    
Residual Std. Error (df = 539)     0.132          0.137    
F Statistic (df = 71; 539)       26.706***      24.902***  
===========================================================
Note:                           *p<0.1; **p<0.05; ***p<0.01

> # End time tracker and displaying it
> (time.taken <- Sys.time() - start.time)
Time difference of 31.35148 secs
